﻿Imports DTO
Imports DAO
Public Class ChucVuBUS

    Public Function CapNhatChuVu(ByVal sql As String) As Integer
        Dim dao As New ChucVuDAO()
        Return dao.CapNhatChucVu(sql)
    End Function

    Public Function ThemChucVu(ByVal sql As String) As Integer
        Dim dao As New ChucVuDAO()
        Return dao.ThemChucVu(sql)
    End Function

    Public Function LayDSChucVu() As List(Of ChucVuDTO)
        Dim dao As New ChucVuDAO()
        Return dao.LayDSChucVu()
    End Function
End Class
